home *** CD-ROM | disk | FTP | other *** search
/ Apple Macintosh CD: Powe…osh 6100/7100/8100 Series / Apple Macintosh CD - Power Macintosh 6100, 7100, 8100 series.7z / Apple Macintosh CD - Power Macintosh 6100, 7100, 8100 series.bin / Power Macintosh Demo Apps / Wolfram / Color Movie < prev    next >
Text File  |  1994-03-01  |  12KB  |  131 lines

  1. (*^
  2. ::[    Information =
  3.  
  4.     "This is a Mathematica Notebook file.  It contains ASCII text, and can be
  5.     transferred by email, ftp, or other text-file transfer utility.  It should
  6.     be read or edited using a copy of Mathematica or MathReader.  If you 
  7.     received this as email, use your mail application or copy/paste to save 
  8.     everything from the line containing (*^ down to the line containing ^*)
  9.     into a plain text file.  On some systems you may have to give the file a 
  10.     name ending with ".ma" to allow Mathematica to recognize it as a Notebook.
  11.     The line below identifies what version of Mathematica created this file,
  12.     but it can be opened using any other version as well.";
  13.  
  14.     FrontEndVersion = "Macintosh Mathematica Notebook Front End Version 2.2";
  15.  
  16.     MacintoshStandardFontEncoding; 
  17.     
  18.     fontset = title, Text, formatAsCurrentKernel, evaluateAsCurrentKernel, inactive, nohscroll, noKeepOnOnePage, preserveAspect, groupLikeTitle, M7, bold, L3, e8,  24, "Times"; 
  19.     fontset = subtitle, Text, formatAsCurrentKernel, evaluateAsCurrentKernel, inactive, nohscroll, noKeepOnOnePage, preserveAspect, groupLikeTitle, center, M7, bold, L2, e6,  18, "New York"; 
  20.     fontset = subsubtitle, Text, formatAsCurrentKernel, evaluateAsCurrentKernel, inactive, nohscroll, noKeepOnOnePage, preserveAspect, groupLikeTitle, center, M7, bold, L2, e50,  14, "New York"; 
  21.     fontset = section, Text, formatAsCurrentKernel, evaluateAsCurrentKernel, inactive, nohscroll, noKeepOnOnePage, preserveAspect, groupLikeSection, grayBox, M22, bold, L2, a20,  14, "New York"; 
  22.     fontset = subsection, Text, formatAsCurrentKernel, evaluateAsCurrentKernel, inactive, nohscroll, noKeepOnOnePage, preserveAspect, groupLikeSection, blackBox, M19, bold, L2, a15,  12, "New York"; 
  23.     fontset = subsubsection, Text, formatAsCurrentKernel, evaluateAsCurrentKernel, inactive, nohscroll, noKeepOnOnePage, preserveAspect, groupLikeSection, whiteBox, M18, bold, L2, a12,  10, "New York"; 
  24.     fontset = text, Text, formatAsCurrentKernel, evaluateAsCurrentKernel, inactive, nohscroll, noKeepOnOnePage, preserveAspect, M7, L2,  12, "Times"; 
  25.     fontset = smalltext, Text, formatAsCurrentKernel, evaluateAsCurrentKernel, inactive, nohscroll, noKeepOnOnePage, preserveAspect, M7, L2,  10, "Times"; 
  26.     fontset = input, Text, formatAsCurrentKernel, evaluateAsCurrentKernel, nowordwrap, preserveAspect, groupLikeInput, M42, N23, bold, L2,  12, "Courier"; 
  27.     fontset = output, Text, formatAsCurrentKernel, evaluateAsCurrentKernel, output, inactive, nowordwrap, preserveAspect, groupLikeOutput, M42, N23, L2,  12, "Courier"; 
  28.     fontset = message, Text, formatAsCurrentKernel, evaluateAsCurrentKernel, inactive, nowordwrap, preserveAspect, groupLikeOutput, M42, N23, R65535, L2,  12, "Courier"; 
  29.     fontset = print, Text, formatAsCurrentKernel, evaluateAsCurrentKernel, inactive, nowordwrap, preserveAspect, groupLikeOutput, M42, N23, L2,  12, "Courier"; 
  30.     fontset = info, Text, formatAsCurrentKernel, evaluateAsCurrentKernel, inactive, nowordwrap, preserveAspect, groupLikeOutput, M42, N23, L2,  12, "Courier"; 
  31.     fontset = postscript, PostScript, formatAsPostScript, evaluateAsCurrentKernel, output, inactive, nowordwrap, preserveAspect, groupLikeGraphics, M7, l35, w160, h162, L2,  12, "Courier"; 
  32.     fontset = name, Text, formatAsCurrentKernel, evaluateAsCurrentKernel, inactive, nowordwrap, nohscroll, noKeepOnOnePage, preserveAspect, M7, italic, B65535, L2,  10, "Geneva"; 
  33.     fontset = header, Text, formatAsCurrentKernel, evaluateAsCurrentKernel, inactive, noKeepOnOnePage, preserveAspect, M7, L2,  10, "Times"; 
  34.     fontset = leftheader, Text, formatAsCurrentKernel, evaluateAsCurrentKernel, nohscroll, preserveAspect, L2,  12, "Times"; 
  35.     fontset = footer, Text, formatAsCurrentKernel, evaluateAsCurrentKernel, inactive, noKeepOnOnePage, preserveAspect, center, M7, L2,  12, "Times"; 
  36.     fontset = leftfooter, Text, formatAsCurrentKernel, evaluateAsCurrentKernel, preserveAspect, center, L2,  12, "Times"; 
  37.     fontset = help, Text, formatAsCurrentKernel, evaluateAsCurrentKernel, inactive, nohscroll, noKeepOnOnePage, preserveAspect, M7, L2,  10, "Geneva"; 
  38.     fontset = clipboard, Text, formatAsCurrentKernel, evaluateAsCurrentKernel, inactive, noKeepOnOnePage, preserveAspect, M7, L2,  12, "New York"; 
  39.     fontset = completions, Text, formatAsCurrentKernel, evaluateAsCurrentKernel, inactive, nowordwrap, noKeepOnOnePage, preserveAspect, M7, L2,  12, "New York"; 
  40.     fontset = special1, Text, formatAsCurrentKernel, evaluateAsCurrentKernel, inactive, nowordwrap, noKeepOnOnePage, preserveAspect, M7, L2,  12, "New York"; 
  41.     fontset = special2, Text, formatAsCurrentKernel, evaluateAsCurrentKernel, inactive, nowordwrap, noKeepOnOnePage, preserveAspect, center, M7, L2,  12, "New York"; 
  42.     fontset = special3, Text, formatAsCurrentKernel, evaluateAsCurrentKernel, inactive, nowordwrap, noKeepOnOnePage, preserveAspect, right, M7, L2,  12, "New York"; 
  43.     fontset = special4, Text, formatAsCurrentKernel, evaluateAsCurrentKernel, inactive, nowordwrap, noKeepOnOnePage, preserveAspect, M7, L2,  12, "New York"; 
  44.     fontset = special5, Text, formatAsCurrentKernel, evaluateAsCurrentKernel, inactive, nowordwrap, noKeepOnOnePage, preserveAspect, M7, L2,  12, "New York"; 
  45.     paletteColors = 128; 
  46. ]
  47. :[font = title; inactive; preserveAspect; startGroup]
  48. Spinning Stellated Icosahedron
  49. (for color monitors)
  50.  
  51.  
  52. :[font = text; inactive; preserveAspect]
  53. This notebook contains an animated “movie” produced using built-in Mathematica  functions and a standard Mathematica  package. To show the movie,
  54.   •  Scroll until the first graphics cell is completely visible in the window.
  55.       (The movie is shown in this cell.)
  56.   •  Double-click the first graphics cell to start the movie.  
  57.       Click again anywhere to stop the animation.
  58. ;[s]
  59. 5:0,0;67,1;78,0;105,1;116,0;380,-1;
  60. 2:3,14,9,Times,0,12,0,0,0;2,14,9,Times,2,12,0,0,0;
  61. :[font = text; inactive; preserveAspect]
  62. See the file Read This First! for a more detailed explanation of how to run a movie, and how to control its speed and direction. Mathematica  generates all graphics in PostScript, but the images here were saved as bitmaps to conserve disk space.
  63. ;[s]
  64. 5:0,0;13,1;29,0;129,2;141,0;246,-1;
  65. 3:3,14,9,Times,0,12,0,0,0;1,14,9,Times,1,12,0,0,0;1,14,9,Times,2,12,0,0,0;
  66. :[font = postscript; PICT; formatAsPICT; output; inactive; Cclosed; dontPreserveAspect; pictureLeft = 80; pictureTop = 1; pictureWidth = 282; pictureHeight = 282; startGroup; pictureID = 13924; animationSpeed = 8]
  67.  
  68. :[font = postscript; PICT; formatAsPICT; output; inactive; preserveAspect; pictureLeft = 80; pictureTop = 1; pictureWidth = 282; pictureHeight = 282; pictureID = 14100; animationSpeed = 8]
  69.  
  70. :[font = postscript; PICT; formatAsPICT; output; inactive; preserveAspect; pictureLeft = 80; pictureTop = 1; pictureWidth = 282; pictureHeight = 282; pictureID = 20013; animationSpeed = 8]
  71.  
  72. :[font = postscript; PICT; formatAsPICT; output; inactive; preserveAspect; pictureLeft = 80; pictureTop = 1; pictureWidth = 282; pictureHeight = 282; pictureID = 11022; animationSpeed = 8]
  73.  
  74. :[font = postscript; PICT; formatAsPICT; output; inactive; preserveAspect; pictureLeft = 80; pictureTop = 1; pictureWidth = 282; pictureHeight = 282; pictureID = 23646; animationSpeed = 8]
  75.  
  76. :[font = postscript; PICT; formatAsPICT; output; inactive; preserveAspect; pictureLeft = 80; pictureTop = 1; pictureWidth = 282; pictureHeight = 282; pictureID = 13053; animationSpeed = 8]
  77.  
  78. :[font = postscript; PICT; formatAsPICT; output; inactive; preserveAspect; pictureLeft = 80; pictureTop = 1; pictureWidth = 282; pictureHeight = 282; pictureID = 1187; animationSpeed = 8]
  79.  
  80. :[font = postscript; PICT; formatAsPICT; output; inactive; preserveAspect; pictureLeft = 80; pictureTop = 1; pictureWidth = 282; pictureHeight = 282; pictureID = 2824; animationSpeed = 8]
  81.  
  82. :[font = postscript; PICT; formatAsPICT; output; inactive; preserveAspect; pictureLeft = 80; pictureTop = 1; pictureWidth = 282; pictureHeight = 282; pictureID = 22930; animationSpeed = 8]
  83.  
  84. :[font = postscript; PICT; formatAsPICT; output; inactive; preserveAspect; pictureLeft = 80; pictureTop = 1; pictureWidth = 282; pictureHeight = 282; pictureID = 25728; animationSpeed = 8]
  85.  
  86. :[font = postscript; PICT; formatAsPICT; output; inactive; preserveAspect; pictureLeft = 80; pictureTop = 1; pictureWidth = 282; pictureHeight = 282; pictureID = 14921; animationSpeed = 8]
  87.  
  88. :[font = postscript; PICT; formatAsPICT; output; inactive; preserveAspect; pictureLeft = 80; pictureTop = 1; pictureWidth = 282; pictureHeight = 282; pictureID = 18317; animationSpeed = 8]
  89.  
  90. :[font = postscript; PICT; formatAsPICT; output; inactive; preserveAspect; pictureLeft = 80; pictureTop = 1; pictureWidth = 282; pictureHeight = 282; pictureID = 12018; animationSpeed = 8]
  91.  
  92. :[font = postscript; PICT; formatAsPICT; output; inactive; preserveAspect; pictureLeft = 80; pictureTop = 1; pictureWidth = 282; pictureHeight = 282; pictureID = 16780; animationSpeed = 8]
  93.  
  94. :[font = postscript; PICT; formatAsPICT; output; inactive; preserveAspect; pictureLeft = 80; pictureTop = 1; pictureWidth = 282; pictureHeight = 282; pictureID = 11810; animationSpeed = 8]
  95.  
  96. :[font = postscript; PICT; formatAsPICT; output; inactive; preserveAspect; pictureLeft = 80; pictureTop = 1; pictureWidth = 282; pictureHeight = 282; pictureID = 4477; animationSpeed = 8]
  97.  
  98. :[font = postscript; PICT; formatAsPICT; output; inactive; preserveAspect; pictureLeft = 80; pictureTop = 1; pictureWidth = 282; pictureHeight = 282; pictureID = 2886; animationSpeed = 8]
  99.  
  100. :[font = postscript; PICT; formatAsPICT; output; inactive; preserveAspect; pictureLeft = 80; pictureTop = 1; pictureWidth = 282; pictureHeight = 282; pictureID = 11377; animationSpeed = 8]
  101.  
  102. :[font = postscript; PICT; formatAsPICT; output; inactive; preserveAspect; pictureLeft = 80; pictureTop = 1; pictureWidth = 282; pictureHeight = 282; pictureID = 2465; animationSpeed = 8]
  103.  
  104. :[font = postscript; PICT; formatAsPICT; output; inactive; preserveAspect; pictureLeft = 80; pictureTop = 1; pictureWidth = 282; pictureHeight = 282; pictureID = 25222; animationSpeed = 8]
  105.  
  106. :[font = postscript; PICT; formatAsPICT; output; inactive; preserveAspect; pictureLeft = 80; pictureTop = 1; pictureWidth = 282; pictureHeight = 282; pictureID = 4897; animationSpeed = 8]
  107.  
  108. :[font = postscript; PICT; formatAsPICT; output; inactive; preserveAspect; pictureLeft = 80; pictureTop = 1; pictureWidth = 282; pictureHeight = 282; pictureID = 8052; animationSpeed = 8]
  109.  
  110. :[font = postscript; PICT; formatAsPICT; output; inactive; preserveAspect; pictureLeft = 80; pictureTop = 1; pictureWidth = 282; pictureHeight = 282; pictureID = 22103; animationSpeed = 8]
  111.  
  112. :[font = postscript; PICT; formatAsPICT; output; inactive; preserveAspect; pictureLeft = 80; pictureTop = 1; pictureWidth = 282; pictureHeight = 282; pictureID = 30030; animationSpeed = 8]
  113.  
  114. :[font = postscript; PICT; formatAsPICT; output; inactive; preserveAspect; pictureLeft = 80; pictureTop = 1; pictureWidth = 282; pictureHeight = 282; pictureID = 31986; animationSpeed = 8]
  115.  
  116. :[font = postscript; PICT; formatAsPICT; output; inactive; preserveAspect; pictureLeft = 80; pictureTop = 1; pictureWidth = 282; pictureHeight = 282; pictureID = 30343; animationSpeed = 8]
  117.  
  118. :[font = postscript; PICT; formatAsPICT; output; inactive; preserveAspect; pictureLeft = 80; pictureTop = 1; pictureWidth = 282; pictureHeight = 282; pictureID = 5881; animationSpeed = 8]
  119.  
  120. :[font = postscript; PICT; formatAsPICT; output; inactive; preserveAspect; pictureLeft = 80; pictureTop = 1; pictureWidth = 282; pictureHeight = 282; pictureID = 23756; animationSpeed = 8]
  121.  
  122. :[font = postscript; PICT; formatAsPICT; output; inactive; preserveAspect; pictureLeft = 80; pictureTop = 1; pictureWidth = 282; pictureHeight = 282; pictureID = 13405; animationSpeed = 8]
  123.  
  124. :[font = postscript; PICT; formatAsPICT; output; inactive; preserveAspect; pictureLeft = 80; pictureTop = 1; pictureWidth = 282; pictureHeight = 282; pictureID = 6734; animationSpeed = 8]
  125.  
  126. :[font = postscript; PICT; formatAsPICT; output; inactive; preserveAspect; pictureLeft = 80; pictureTop = 1; pictureWidth = 282; pictureHeight = 282; pictureID = 15511; animationSpeed = 8]
  127.  
  128. :[font = postscript; PICT; formatAsPICT; output; inactive; preserveAspect; pictureLeft = 80; pictureTop = 1; pictureWidth = 282; pictureHeight = 282; endGroup; endGroup; pictureID = 20477; animationSpeed = 8]
  129.  
  130. ^*)
  131.